﻿Public Class Farmacia
    'TODO HACER PROPIEDADES

#Region "Declaraciones"
    Private cId As Integer
    Private cNombre As String
    Private cRazonSocial As String
    Private cEmail As String
    Private cTelefono As String
    Private cRepresentantes As New Generic.List(Of RepresentanteFarmacia)
#End Region

#Region "Constructores"
    Public Sub New()
        cId = -1
        cNombre = ""
        cRazonSocial = ""
        cEmail = ""
        cTelefono = ""
        cRepresentantes = Nothing
    End Sub

    Public Sub New(ByVal pId As Integer, ByVal pNombre As String, ByVal pDescripcion As String, ByVal pRazonSocial As String, ByVal pEmail As String, ByVal pTelefono As String, ByRef pRepresentantes As Generic.List(Of RepresentanteFarmacia))
        cId = pId
        cNombre = pNombre
        cRazonSocial = pRazonSocial
        cEmail = pEmail
        cTelefono = pTelefono
        cRepresentantes = pRepresentantes
    End Sub
#End Region

#Region "Propiedades"
    Public Property Id()
        Get
            Return cId
        End Get
        Set(ByVal value)
            cId = value
        End Set
    End Property

    Public Property Nombre()
        Get
            Return cNombre
        End Get
        Set(ByVal value)
            cNombre = value
        End Set
    End Property

    Public Property RazonSocial()
        Get
            Return cRazonSocial
        End Get
        Set(ByVal value)
            cRazonSocial = value
        End Set
    End Property

    Public Property Email()
        Get
            Return cEmail
        End Get
        Set(ByVal value)
            cEmail = value
        End Set
    End Property

    Public Property Telefono()
        Get
            Return cTelefono
        End Get
        Set(ByVal value)
            cTelefono = value
        End Set
    End Property

    Public Property Representantes()
        Get
            Return cRepresentantes
        End Get
        Set(ByVal value)
            cRepresentantes = value
        End Set
    End Property
#End Region
End Class
